*******************************************************
* Lyle 05 Jan 11: 						              *
*	-this program serves as a base shell for all	  *
*	 stata do files					                  *
*******************************************************

********************************
* Standard Stata Configuration *
********************************
clear all
set mem 999m
capture log close
set logtype text
cap cd "C:\Users\ejm5\Google Drive\2017_Research\Unemployment_MILEX"
cap cd "C:\Users\Jordan.Becker\Desktop\GD\2017_Research\Unemployment_MILEX"
cap cd "\\usnatonetapp01.eur.state.sbu\profiles\beckerjm\Desktop\2017_Research\Unemployment_MILEX"
log using "log\SGP_figure3.log", replace
set more off


********************
* Analyze the Data *
********************
#delimit;
use "dta\2017_uem", clear;
sort ccode year;
xtset ccode year;


***GENERATE FIGURES***

#delimit;

*Figure 3: Bar Graph With Disaggregated MILEX by Country*
#delimit;
use "dta\2017_uem", clear;
preserve;
keep if year==2014 & countryname!="Iceland";
graph bar (mean) equipment_gdp (mean) personnel_gdp (mean) operating_gdp (mean) infrastructure_gdp, scheme (sj) 
over(countryname, label(labcolor(black) 
angle(forty_five) labsize(vsmall))) stack yline(2, lcolor(red) lpattern(dash) lwidth(medthick)) 
ytitle("Expenditures/GDP (%), by Mil. Category (2014)", size(medsmall) margin(medium)) legend(rows(1) position(6)  size(vsmall) 
label (1 "Equipment") label (2 "Personnel") label (3 "O&M")  label (4 "Infrastructure")) ysize (10) ylab(0(.5)4, labsize(vsmall));
graph save output\Figure3disagg_all.gph, replace;
restore;

